home *** CD-ROM | disk | FTP | other *** search
/ Power CD / Power CD ATARI-Rechner Lieben.iso / APPS / PD / MATHE / PQ < prev   
Encoding:
Text File  |  1989-04-05  |  121 b   |  9 lines
  1. RUN(1.2.3.4.5.6.7)
  2. INPMOD(2)
  3. P+Q
  4. INPMOD(1)
  5. X1=-(P/2)+SQR((P/2)^2-Q)
  6. X2=-(P/2)-SQR((P/2)^2-Q)
  7. PRINT(X1)
  8. PRINT(X2)
  9.